Visual Basic Source Code/Visual Basic Source Code.iso/vbsource/addres/address.frm

Text File | 1995-05-07 | 51KB | 1,794 lines

VERSION 2.00
Begin Form Address
   BackColor       =   &H00C0C0C0&
   Caption         =   "Mike's Address"
   ClientHeight    =   5355
   ClientLeft      =   2115
   ClientTop       =   1410
   ClientWidth     =   5175
   Height          =   6045
   Icon            =   ADDRESS.FRX:0000
   Left            =   2055
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   ScaleHeight     =   5355
   ScaleWidth      =   5175
   Top             =   780
   Width           =   5295
   Begin Timer Timer1
      Enabled         =   0   'False
      Interval        =   1000
      Left            =   4560
      Top             =   2520
   End
   Begin SSCommand Command3D3
      BevelWidth      =   4
      Caption         =   "&Voice"
      Font3D          =   3  'Inset w/light shading
      Height          =   375
      Left            =   120
      TabIndex        =   34
      Top             =   4920
      Width           =   855
   End
   Begin ListBox List2
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "Arial"
      FontSize        =   8.25
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   450
      Left            =   1080
      TabIndex        =   11
      Top             =   4725
      Width           =   3975
   End
   Begin ListBox List1
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "Arial"
      FontSize        =   8.25
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   3180
      Left            =   5280
      TabIndex        =   27
      TabStop         =   0   'False
      Top             =   480
      Visible         =   0   'False
      Width           =   1215
   End
   Begin CommandButton Command1
      Caption         =   "|>"
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "MS Serif"
      FontSize        =   9.75
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   275
      Index           =   3
      Left            =   4875
      TabIndex        =   26
      TabStop         =   0   'False
      Top             =   4440
      Visible         =   0   'False
      Width           =   300
   End
   Begin CommandButton Command1
      Caption         =   ">"
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "MS Serif"
      FontSize        =   9.75
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   275
      Index           =   2
      Left            =   4580
      TabIndex        =   25
      TabStop         =   0   'False
      Top             =   4440
      Visible         =   0   'False
      Width           =   300
   End
   Begin CommandButton Command1
      Caption         =   "<"
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "MS Serif"
      FontSize        =   9.75
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   275
      Index           =   1
      Left            =   285
      TabIndex        =   24
      TabStop         =   0   'False
      Top             =   4440
      Visible         =   0   'False
      Width           =   300
   End
   Begin CommandButton Command1
      Caption         =   "|<"
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "MS Serif"
      FontSize        =   9.75
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   275
      Index           =   0
      Left            =   0
      TabIndex        =   23
      TabStop         =   0   'False
      Top             =   4440
      Visible         =   0   'False
      Width           =   300
   End
   Begin Data Data1
      Caption         =   "Data1"
      Connect         =   ""
      DatabaseName    =   ""
      Exclusive       =   0   'False
      Height          =   270
      Left            =   0
      Options         =   0
      ReadOnly        =   0   'False
      RecordSource    =   ""
      Top             =   4440
      Width           =   5175
   End
   Begin SSPanel Panel3D1
      Alignment       =   6  'Center - TOP
      BackColor       =   &H00C0C0C0&
      BevelInner      =   2  'Raised
      BorderWidth     =   1
      Font3D          =   3  'Inset w/light shading
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "Arial"
      FontSize        =   8.25
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   4455
      Left            =   0
      TabIndex        =   12
      Top             =   0
      Width           =   5175
      Begin SSCommand Command3D2
         Caption         =   "&Update"
         Font3D          =   3  'Inset w/light shading
         FontBold        =   -1  'True
         FontItalic      =   0   'False
         FontName        =   "Arial"
         FontSize        =   8.25
         FontStrikethru  =   0   'False
         FontUnderline   =   0   'False
         Height          =   255
         Left            =   3360
         TabIndex        =   30
         Top             =   0
         Width           =   855
      End
      Begin SSCommand Command3D1
         Caption         =   "&Cancel"
         Font3D          =   3  'Inset w/light shading
         FontBold        =   -1  'True
         FontItalic      =   0   'False
         FontName        =   "Arial"
         FontSize        =   8.25
         FontStrikethru  =   0   'False
         FontUnderline   =   0   'False
         Height          =   255
         Left            =   4200
         TabIndex        =   31
         Top             =   0
         Width           =   855
      End
      Begin TextBox Text11
         DataField       =   "tAlpha"
         DataSource      =   "Data1"
         FontBold        =   -1  'True
         FontItalic      =   0   'False
         FontName        =   "Courier"
         FontSize        =   9.75
         FontStrikethru  =   0   'False
         FontUnderline   =   0   'False
         Height          =   360
         Left            =   4200
         MaxLength       =   5
         TabIndex        =   5
         Text            =   "tAlph"
         Top             =   1680
         Width           =   855
      End
      Begin TextBox Text10
         DataField       =   "tRegion"
         DataSource      =   "Data1"
         FontBold        =   -1  'True
         FontItalic      =   0   'False
         FontName        =   "Courier"
         FontSize        =   9.75
         FontStrikethru  =   0   'False
         FontUnderline   =   0   'False
         Height          =   360
         Left            =   1800
         MaxLength       =   15
         TabIndex        =   7
         Text            =   "tRegion"
         Top             =   2280
         Width           =   2175
      End
      Begin TextBox Text9
         DataField       =   "tPhone"
         DataSource      =   "Data1"
         FontBold        =   -1  'True
         FontItalic      =   0   'False
         FontName        =   "Courier"
         FontSize        =   9.75
         FontStrikethru  =   0   'False
         FontUnderline   =   0   'False
         Height          =   360
         Left            =   120
         MaxLength       =   35
         TabIndex        =   10
         Text            =   "tPhone"
         Top             =   4080
         Width           =   4935
      End
      Begin TextBox Text8
         DataField       =   "tInfo"
         DataSource      =   "Data1"
         FontBold        =   -1  'True
         FontItalic      =   0   'False
         FontName        =   "Courier"